home *** CD-ROM | disk | FTP | other *** search
/ Univers Mac Interactif 45 / Univers Mac Interactif - Issue 45.iso / Utilitaires / GIFConverter 2.3.7 Folder / GIFConverter 2.3.7 / GIFConverter 2.3.7.rsrc / ps_1001_Script < prev    next >
Text File  |  1994-01-29  |  264b  |  12 lines
  1. save 100 dict begin
  2. /bdf {bind def} bind def
  3. /xdf {exch def} bdf
  4.  
  5. /halftone % xdata ydata xsize ysize xpos ypos halftone
  6. {moveto scale /hgt xdf /wid xdf 
  7. /halfbuf wid string def
  8. wid hgt 8 
  9. [wid 0 0 hgt 0 0]
  10. {currentfile halfbuf readhexstring pop} bind image
  11. } bdf
  12.